home *** CD-ROM | disk | FTP | other *** search
/ National Lampoon's Blind Date / National Lampoon's Blind Date.iso / bd / mainmen2.mmm / 00006_Script_6 < prev    next >
Text File  |  1995-03-01  |  2KB  |  64 lines
  1. on startMovie
  2.   global saveFunds, saveMood
  3.   global theFunds, moodRing
  4.   
  5.   --set theFunds = saveFunds
  6.   set theFunds = 70
  7.   set moodRing = saveMood
  8.   resetPart2Vars()  
  9.   set the volume of sound 1 to 255
  10. end startMovie
  11. ----------------------------------------------------------------
  12. on resetPart2Vars
  13.   global AVisited,BVisited,CVisited,DVisited
  14.   global EVisited,FVisited,GVisited,HVisited
  15.   global thePart, bathVisited, originated
  16.   
  17.   set AVisited = 0
  18.   set BVisited = 0
  19.   set CVisited = 0
  20.   set DVisited = 0
  21.   set EVisited = 0
  22.   set FVisited = 0
  23.   set GVisited = 0
  24.   set HVisited = 0
  25.   set bathVisited = FALSE
  26.   set originated = "none"
  27. end resetPart2Vars
  28. ----------------------------------------------------------------
  29. on resetVars
  30.   global AVisited,BVisited,CVisited,DVisited
  31.   global EVisited,FVisited,GVisited,HVisited
  32.   global bathVisited, originated
  33.   global theFunds, moodRing, saveMood, saveFunds
  34.   global Drinks, thePart, currClue, returnScene, blindVersion, quizScore
  35.   
  36.   set blindVersion = "BlindDate1.3"
  37.   set thePart = 1
  38.   set currClue = 1
  39.   set Drinks = 0
  40.   set moodRing = 0
  41.   set theFunds = 100
  42.   set saveMood = 0
  43.   set saveFunds = 70
  44.   set returnScene = "s41"
  45.   set AVisited = 0
  46.   set BVisited = 0
  47.   set CVisited = 0
  48.   set DVisited = 0
  49.   set EVisited = 0
  50.   set FVisited = 0
  51.   set GVisited = 0
  52.   set HVisited = 0
  53.   set bathVisited = FALSE
  54.   set originated = "none"
  55.   set quizScore = 0
  56. end
  57. ----------------------------------------------------------------
  58. on loopLastFrame
  59.   if not soundBusy(1) then
  60.     puppetSound "Unbeliev.aif"
  61.   end if  
  62.   go to frame the frame
  63. end loopLastFrame
  64.